inherited FGeraCobrancaProgramadaAvulsa: TFGeraCobrancaProgramadaAvulsa
  Left = 308
  Top = 166
  Width = 769
  Height = 603
  Caption = 'T'#237'tulo a Receber - Seq'#252#234'ncia'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 16
  inherited pcCadastro: TPageControl
    Width = 761
    Height = 565
    inherited TsPesquisa: TTabSheet
      inherited pnPesquisa: TPanel
        Top = 477
        Width = 753
      end
      inherited dbgPesquisaPadra: TDBGrid
        Width = 753
        Height = 420
      end
      inherited pnPesquisaPadrao: TPanel
        Width = 753
      end
    end
    inherited TsCadastro: TTabSheet
      inherited panel1: TPanel
        Width = 753
        Height = 534
        object Label18: TLabel [0]
          Left = 5
          Top = 48
          Width = 103
          Height = 16
          Caption = 'Fonte de Recurso'
        end
        inherited panel2: TPanel
          Width = 751
          TabOrder = 5
          inherited SBAtualiza: TSpeedButton
            Left = 238
          end
          inherited BtnIncluir: TBitBtn
            Tag = 5
            Left = 10
            Caption = '&Executar'
          end
          inherited BtnEditar: TBitBtn
            Left = 209
            Visible = False
          end
          inherited BtnFechar: TBitBtn
            Tag = 5
            Left = 661
          end
          inherited BtnExcluir: TBitBtn
            Visible = False
          end
          inherited DBNavigator1: TDBNavigator
            Hints.Strings = ()
            Visible = False
          end
        end
        inherited panel3: TPanel
          Top = 529
          Width = 751
          Height = 4
          TabOrder = 6
          inherited BtnConsuta: TBitBtn
            Visible = False
          end
          inherited BtnSalvar: TBitBtn
            Left = 207
            Visible = False
          end
          inherited BtnCancelar: TBitBtn
            Left = 209
            Visible = False
          end
        end
        object ProgressBar: TProgressBar
          Left = 1
          Top = 508
          Width = 751
          Height = 21
          Align = alBottom
          Min = 0
          Max = 100
          Step = 1
          TabOrder = 7
        end
        object DBLFonteRecurso: TDBLookupComboBox
          Tag = 5
          Left = 5
          Top = 66
          Width = 321
          Height = 22
          Ctl3D = False
          KeyField = 'FONT_CODIGO'
          ListField = 'FONT_DESCRICAO'
          ListSource = dsFonteRecurso
          ParentCtl3D = False
          TabOrder = 0
          OnKeyDown = DBLFonteRecursoKeyDown
        end
        object gbDocumento: TGroupBox
          Left = 345
          Top = 50
          Width = 409
          Height = 69
          Caption = '  Documento  '
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 1
          object Label10: TLabel
            Left = 10
            Top = 16
            Width = 24
            Height = 16
            Caption = 'Tipo'
          end
          object Label16: TLabel
            Left = 207
            Top = 16
            Width = 45
            Height = 16
            Caption = 'N'#250'mero'
          end
          object Label19: TLabel
            Left = 287
            Top = 16
            Width = 27
            Height = 16
            Caption = 'Data'
          end
          object DBLCBTipoDocumento: TDBLookupComboBox
            Tag = 5
            Left = 10
            Top = 36
            Width = 188
            Height = 22
            KeyField = 'TIPO_DOC_CODIGO'
            ListField = 'TIPO_DOC_DESCRICAO'
            ListSource = DSTipoDocumento
            TabOrder = 0
            OnKeyDown = DBLCBClienteKeyDown
          end
          object EDocumento: TEdit
            Tag = 5
            Left = 207
            Top = 36
            Width = 70
            Height = 19
            MaxLength = 6
            TabOrder = 1
          end
          object DTDataDocumento: TDateEdit
            Tag = 5
            Left = 286
            Top = 36
            Width = 113
            Height = 23
            ButtonWidth = 26
            NumGlyphs = 2
            TabOrder = 2
          end
        end
        object gbCheque: TGroupBox
          Left = 10
          Top = 121
          Width = 744
          Height = 72
          Caption = '  Dados do Cheque  '
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 2
          object Label5: TLabel
            Left = 10
            Top = 20
            Width = 37
            Height = 16
            Caption = 'Banco'
          end
          object Label14: TLabel
            Left = 79
            Top = 20
            Width = 47
            Height = 16
            Caption = 'Ag'#234'ncia'
          end
          object Label20: TLabel
            Left = 148
            Top = 20
            Width = 34
            Height = 16
            Caption = 'Conta'
          end
          object Label21: TLabel
            Left = 246
            Top = 20
            Width = 18
            Height = 16
            Caption = 'N'#186' '
          end
          object Label22: TLabel
            Left = 315
            Top = 20
            Width = 52
            Height = 16
            Caption = 'Emitente'
          end
          object edBanco: TEdit
            Tag = 5
            Left = 10
            Top = 39
            Width = 60
            Height = 19
            MaxLength = 4
            TabOrder = 0
          end
          object edAgencia: TEdit
            Tag = 5
            Left = 79
            Top = 39
            Width = 60
            Height = 19
            MaxLength = 6
            TabOrder = 1
          end
          object edConta: TEdit
            Tag = 5
            Left = 148
            Top = 39
            Width = 90
            Height = 19
            MaxLength = 10
            TabOrder = 2
          end
          object edNumero: TEdit
            Tag = 5
            Left = 246
            Top = 39
            Width = 60
            Height = 19
            MaxLength = 6
            TabOrder = 3
          end
          object edEmitente: TEdit
            Tag = 5
            Left = 315
            Top = 39
            Width = 421
            Height = 19
            MaxLength = 40
            TabOrder = 4
          end
        end
        object gbInfo: TGroupBox
          Left = 10
          Top = 197
          Width = 744
          Height = 191
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 3
          object Label6: TLabel
            Left = 15
            Top = 12
            Width = 67
            Height = 16
            Caption = 'Cliente (F8)'
          end
          object Label7: TLabel
            Left = 388
            Top = 12
            Width = 49
            Height = 16
            Caption = 'Portador'
          end
          object Label8: TLabel
            Left = 15
            Top = 64
            Width = 168
            Height = 16
            Caption = 'Classifica'#231#227'o Financeira (F8)'
          end
          object Label4: TLabel
            Left = 388
            Top = 118
            Width = 51
            Height = 16
            Caption = 'Hist'#243'rico'
          end
          object Label13: TLabel
            Left = 388
            Top = 65
            Width = 121
            Height = 16
            Caption = 'Centro de Custo (F8)'
          end
          object Label17: TLabel
            Left = 15
            Top = 118
            Width = 85
            Height = 16
            Caption = 'Conta Cont'#225'bil'
          end
          object DBText3: TDBText
            Left = 117
            Top = 118
            Width = 50
            Height = 16
            AutoSize = True
            DataField = 'PLANOCONT_CODIGOCONTABIL'
          end
          object Label23: TLabel
            Left = 15
            Top = 160
            Width = 183
            Height = 16
            Caption = 'F7 = Todos; F8 = Relacionados'
          end
          object DBLCBCliente: TDBLookupComboBox
            Tag = 5
            Left = 15
            Top = 31
            Width = 338
            Height = 22
            Ctl3D = False
            KeyField = 'CLI_CODIGO'
            ListField = 'CLI_RAZAO'
            ListSource = DSCliente
            ParentCtl3D = False
            TabOrder = 0
            OnExit = DBLCBClienteExit
            OnKeyDown = DBLCBClienteKeyDown
          end
          object DBLCBPortador: TDBLookupComboBox
            Tag = 5
            Left = 388
            Top = 31
            Width = 338
            Height = 22
            Ctl3D = False
            KeyField = 'PORT_CODIGO'
            ListField = 'PORT_DESCRICAO'
            ListSource = DSPortador
            ParentCtl3D = False
            TabOrder = 1
            OnEnter = DBLCBPortadorEnter
            OnExit = DBLCBPortadorExit
            OnKeyDown = DBLCBPortadorKeyDown
          end
          object DBLCBPlano: TDBLookupComboBox
            Tag = 5
            Left = 15
            Top = 81
            Width = 338
            Height = 22
            Ctl3D = False
            KeyField = 'CODIGO'
            ListField = 'DESCRICAO'
            ListSource = DSPlano
            ParentCtl3D = False
            TabOrder = 2
            OnExit = DBLCBPlanoExit
            OnKeyDown = DBLCBPlanoKeyDown
          end
          object DBLCBCentroCusto: TDBLookupComboBox
            Tag = 5
            Left = 388
            Top = 81
            Width = 338
            Height = 22
            Ctl3D = False
            KeyField = 'CODIGO'
            ListField = 'DESCRICAO'
            ListSource = DSCentro
            ParentCtl3D = False
            TabOrder = 3
            OnEnter = DBLCBCentroCustoEnter
            OnKeyDown = DBLCBCentroCustoKeyDown
          end
          object DBLCBContaContabil: TDBLookupComboBox
            Tag = 5
            Left = 15
            Top = 135
            Width = 338
            Height = 22
            Hint = '(F7 - Todo , F8 -Relacionados)'
            Ctl3D = False
            KeyField = 'PLANOCONT_CODIGO'
            ListField = 'PLANOCONT_DESCRICAO'
            ListSource = DSPlanoContabil
            ParentCtl3D = False
            TabOrder = 4
            OnClick = DBLCBContaContabilClick
            OnKeyDown = DBLCBContaContabilKeyDown
            OnKeyUp = DBLCBContaContabilKeyUp
          end
          object EHistorico1: TEdit
            Tag = 5
            Left = 388
            Top = 135
            Width = 338
            Height = 19
            Ctl3D = False
            MaxLength = 50
            ParentCtl3D = False
            TabOrder = 5
          end
          object EHistorico2: TEdit
            Tag = 5
            Left = 388
            Top = 158
            Width = 338
            Height = 19
            Ctl3D = False
            MaxLength = 50
            ParentCtl3D = False
            TabOrder = 6
          end
        end
        object gbinfo2: TGroupBox
          Left = 10
          Top = 393
          Width = 747
          Height = 140
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 4
          object Label1: TLabel
            Left = 15
            Top = 20
            Width = 64
            Height = 16
            Caption = 'Data Inicial'
          end
          object Label2: TLabel
            Left = 16
            Top = 50
            Width = 95
            Height = 16
            Caption = 'Intervalo de Dias'
          end
          object Label3: TLabel
            Left = 16
            Top = 81
            Width = 61
            Height = 16
            Caption = 'Fixar dia ?'
          end
          object Label9: TLabel
            Left = 319
            Top = 17
            Width = 158
            Height = 16
            Caption = 'Quantidade de  Presta'#231#245'es'
          end
          object Label11: TLabel
            Left = 319
            Top = 48
            Width = 62
            Height = 16
            Caption = 'Valor Total'
          end
          object Label12: TLabel
            Left = 319
            Top = 79
            Width = 126
            Height = 16
            Caption = 'Valor da 1'#170' Presta'#231#227'o'
          end
          object Label15: TLabel
            Left = 319
            Top = 110
            Width = 215
            Height = 16
            Caption = 'Valor da(s) Pr'#243'xima(s) Presta'#231#245'es(s)'
          end
          object Bevel1: TBevel
            Left = 303
            Top = 9
            Width = 2
            Height = 130
            Style = bsRaised
          end
          object DEDataInicial: TDateEdit
            Tag = 5
            Left = 172
            Top = 20
            Width = 114
            Height = 26
            Ctl3D = False
            ButtonWidth = 26
            NumGlyphs = 2
            ParentCtl3D = False
            TabOrder = 0
          end
          object EIntervaloDias: TEdit
            Tag = 5
            Left = 172
            Top = 50
            Width = 74
            Height = 19
            Ctl3D = False
            ParentCtl3D = False
            TabOrder = 1
            OnEnter = EIntervaloDiasEnter
            OnExit = EIntervaloDiasExit
            OnKeyPress = EIntervaloDiasKeyPress
          end
          object CheckBNao: TCheckBox
            Left = 231
            Top = 81
            Width = 53
            Height = 21
            Caption = 'N'#227'o'
            Checked = True
            State = cbChecked
            TabOrder = 2
            OnClick = CheckBNaoClick
          end
          object CheckBSim: TCheckBox
            Left = 172
            Top = 81
            Width = 53
            Height = 21
            Caption = 'Sim'
            TabOrder = 3
            OnClick = CheckBSimClick
          end
          object ENumeroPrestacao: TEdit
            Tag = 5
            Left = 533
            Top = 17
            Width = 48
            Height = 19
            Ctl3D = False
            ParentCtl3D = False
            TabOrder = 4
            OnEnter = ENumeroPrestacaoEnter
            OnExit = ENumeroPrestacaoExit
            OnKeyPress = EIntervaloDiasKeyPress
          end
          object EValorTotal: TEdit
            Tag = 5
            Left = 533
            Top = 48
            Width = 87
            Height = 19
            Ctl3D = False
            ParentCtl3D = False
            TabOrder = 5
            OnEnter = EValorTotalEnter
            OnExit = EValorTotalExit
            OnKeyPress = EValorTotalKeyPress
          end
          object EValorPrimeiraPrestacao: TEdit
            Tag = 5
            Left = 533
            Top = 79
            Width = 87
            Height = 19
            Ctl3D = False
            ParentCtl3D = False
            TabOrder = 6
            OnEnter = EValorPrimeiraPrestacaoEnter
            OnExit = EValorPrimeiraPrestacaoExit
            OnKeyPress = EValorTotalKeyPress
          end
          object EValorProximaPrestacao: TEdit
            Tag = 5
            Left = 534
            Top = 110
            Width = 88
            Height = 19
            Ctl3D = False
            ParentCtl3D = False
            TabOrder = 7
            OnEnter = EValorProximaPrestacaoEnter
            OnExit = EValorProximaPrestacaoExit
            OnKeyPress = EValorTotalKeyPress
          end
          object BAjutarValor: TButton
            Tag = 5
            Left = 630
            Top = 47
            Width = 97
            Height = 54
            Caption = 'Ajustar Valor'
            TabOrder = 8
            OnClick = BAjutarValorClick
          end
          object ChBemiteBoleto: TCheckBox
            Tag = 5
            Left = 633
            Top = 108
            Width = 94
            Height = 21
            Caption = 'Emite boleto'
            TabOrder = 9
          end
        end
      end
    end
  end
  object DSCliente: TDataSource
    DataSet = DMGestao.QCliente
    Left = 144
    Top = 512
  end
  object DSTipoDocumento: TDataSource
    DataSet = DMFinanceiro.QTipoDocumento
    Left = 104
    Top = 512
  end
  object DSPortador: TDataSource
    DataSet = DMFinanceiro.Qportador
    Left = 48
    Top = 512
  end
  object DSPlano: TDataSource
    DataSet = DMFinanceiro.QPlanoEntrada
    Left = 176
    Top = 512
  end
  object DSCentro: TDataSource
    DataSet = DMFinanceiro.QCentro
    Left = 240
    Top = 520
  end
  object QPlanoContabil: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      'select * from PlanoContabilidade'
      'Where CodigoEmpresa = :Emp'
      'Order By PlanoCont_CodigoContabil')
    Left = 478
    Top = 506
    ParamData = <
      item
        DataType = ftString
        Name = 'Emp'
        ParamType = ptUnknown
        Value = '1'
      end>
  end
  object DSPlanoContabil: TDataSource
    DataSet = QPlanoContabil
    Left = 510
    Top = 506
  end
  object QContasReceber: TQuery
    DatabaseName = 'base'
    RequestLive = True
    SQL.Strings = (
      'select * from PlanoContabilidade'
      'Where CodigoEmpresa = :Emp'
      'Order By PlanoCont_CodigoContabil')
    Left = 414
    Top = 514
    ParamData = <
      item
        DataType = ftString
        Name = 'Emp'
        ParamType = ptUnknown
        Value = '1'
      end>
  end
  object dsFonteRecurso: TDataSource
    DataSet = DMFinanceiro.QFonteRecurso
    Left = 318
    Top = 453
  end
  object QCheque: TQuery
    Active = True
    DatabaseName = 'base'
    RequestLive = True
    SQL.Strings = (
      'SELECT '
      '  CHEQUE.CH_CODIGO,'
      '  CHEQUE.CH_DTLANCTO,'
      '  CHEQUE.CH_BANCO,'
      '  CHEQUE.CH_AGENCIA,'
      '  CHEQUE.CH_CONTA,'
      '  CHEQUE.CH_CHEQUE,'
      '  CHEQUE.CH_VALOR,'
      '  CHEQUE.CH_VENCTO,'
      '  CHEQUE.CH_EMITENTE,'
      '  CHEQUE.CH_ORIGEM,'
      '  CHEQUE.CH_COD_ORIGEM,'
      '  CHEQUE.CH_DTMOVTO,'
      '  CHEQUE.CH_PORTADOR,'
      '  CHEQUE.CH_SITUACAO,'
      '  CHEQUE.CH_DTSITUACAO,'
      '  CHEQUE.CH_PAGTO,'
      '  CHEQUE.CH_COD_PAGTO,'
      '  CHEQUE.CODIGOEMPRESA,'
      '  CHEQUE.USUARIO,'
      '  CHEQUE.DATAMODIFICACAO,'
      '  CHEQUE.COD_MOVTO,'
      '  CHEQUE.CH_CLIENTE,'
      '  CHEQUE.CH_OBS'
      'FROM'
      '  CHEQUE')
    Left = 438
    Top = 434
  end
  object QChequeHistorico: TQuery
    Active = True
    DatabaseName = 'base'
    RequestLive = True
    SQL.Strings = (
      'SELECT '
      '  CHEQUE_HISTORICO.CH_CODIGO,'
      '  CHEQUE_HISTORICO.CH_DTLANCTO,'
      '  CHEQUE_HISTORICO.CH_BANCO,'
      '  CHEQUE_HISTORICO.CH_AGENCIA,'
      '  CHEQUE_HISTORICO.CH_CONTA,'
      '  CHEQUE_HISTORICO.CH_CHEQUE,'
      '  CHEQUE_HISTORICO.CH_VALOR,'
      '  CHEQUE_HISTORICO.CH_VENCTO,'
      '  CHEQUE_HISTORICO.CH_EMITENTE,'
      '  CHEQUE_HISTORICO.CH_ORIGEM,'
      '  CHEQUE_HISTORICO.CH_COD_ORIGEM,'
      '  CHEQUE_HISTORICO.CH_DTMOVTO,'
      '  CHEQUE_HISTORICO.CH_PORTADOR,'
      '  CHEQUE_HISTORICO.CH_SITUACAO,'
      '  CHEQUE_HISTORICO.CH_DTSITUACAO,'
      '  CHEQUE_HISTORICO.CH_PAGTO,'
      '  CHEQUE_HISTORICO.CH_COD_PAGTO,'
      '  CHEQUE_HISTORICO.CODIGOEMPRESA,'
      '  CHEQUE_HISTORICO.USUARIO,'
      '  CHEQUE_HISTORICO.DATAMODIFICACAO,'
      '  CHEQUE_HISTORICO.COD_MOVTO,'
      '  CHEQUE_HISTORICO.CH_CLIENTE,'
      '  CHEQUE_HISTORICO.CH_OBS'
      'FROM'
      '  CHEQUE_HISTORICO')
    Left = 470
    Top = 434
  end
end
